home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •Word Games• / Ars Magna™ ••• / Ars Magna™ / Ars Magna™.rsrc / CODE_3.txt < prev    next >
Text File  |  1986-09-02  |  15KB  |  278 lines
  1. # near model CODE resource
  2. # jump table entries: 33121-33124 (4 of them)
  3. fn00000000:
  4. 00000000  4E56 0000                link       A6, 0
  5. 00000004  2F07                     move.l     -[A7], D7
  6. 00000006  6000 00B8                bra        +0xBA /* 000000C0 */
  7. label0000000A:
  8. 0000000A  3B6E 0008 FFDE           move.w     [A5 - 0x22], [A6 + 0x8]
  9. 00000010  3E2E 000A                move.w     D7, [A6 + 0xA]
  10. label00000014:
  11. 00000014  526D FFDE                addq.w     [A5 - 0x22], 1
  12. 00000018  302D FFDE                move.w     D0, [A5 - 0x22]
  13. 0000001C  B06E 000A                cmp.w      D0, [A6 + 0xA]
  14. 00000020  6C00 0018                bge        +0x1A /* 0000003A */
  15. 00000024  3F2E 0008                move.w     -[A7], [A6 + 0x8]
  16. 00000028  3F2D FFDE                move.w     -[A7], [A5 - 0x22]
  17. 0000002C  206D FFD6                movea.l    A0, [A5 - 0x2A]
  18. 00000030  4E90                     jsr        [A0]
  19. 00000032  588F                     addq.l     A7, 4
  20. 00000034  4A40                     tst.w      D0
  21. 00000036  6D00 FFDC                blt        -0x22 /* 00000014 */
  22. label0000003A:
  23. 0000003A  5347                     subq.w     D7, 1
  24. 0000003C  BE6E 0008                cmp.w      D7, [A6 + 0x8]
  25. 00000040  6F00 0016                ble        +0x18 /* 00000058 */
  26. 00000044  3F2E 0008                move.w     -[A7], [A6 + 0x8]
  27. 00000048  3F07                     move.w     -[A7], D7
  28. 0000004A  206D FFD6                movea.l    A0, [A5 - 0x2A]
  29. 0000004E  4E90                     jsr        [A0]
  30. 00000050  588F                     addq.l     A7, 4
  31. 00000052  4A40                     tst.w      D0
  32. 00000054  6E00 FFE4                bgt        -0x1A /* 0000003A */
  33. label00000058:
  34. 00000058  BE6D FFDE                cmp.w      D7, [A5 - 0x22]
  35. 0000005C  6F00 0014                ble        +0x16 /* 00000072 */
  36. 00000060  3F07                     move.w     -[A7], D7
  37. 00000062  3F2D FFDE                move.w     -[A7], [A5 - 0x22]
  38. 00000066  206D FFDA                movea.l    A0, [A5 - 0x26]
  39. 0000006A  4E90                     jsr        [A0]
  40. 0000006C  588F                     addq.l     A7, 4
  41. 0000006E  6000 FFA4                bra        -0x5A /* 00000014 */
  42. label00000072:
  43. 00000072  3F07                     move.w     -[A7], D7
  44. 00000074  3F2E 0008                move.w     -[A7], [A6 + 0x8]
  45. 00000078  206D FFDA                movea.l    A0, [A5 - 0x26]
  46. 0000007C  4E90                     jsr        [A0]
  47. 0000007E  588F                     addq.l     A7, 4
  48. 00000080  3007                     move.w     D0, D7
  49. 00000082  906E 0008                sub.w      D0, [A6 + 0x8]
  50. 00000086  322E 000A                move.w     D1, [A6 + 0xA]
  51. 0000008A  9247                     sub.w      D1, D7
  52. 0000008C  5341                     subq.w     D1, 1
  53. 0000008E  B041                     cmp.w      D0, D1
  54. 00000090  6C00 001A                bge        +0x1C /* 000000AC */
  55. 00000094  3F07                     move.w     -[A7], D7
  56. 00000096  3F2E 0008                move.w     -[A7], [A6 + 0x8]
  57. 0000009A  4EBA FF64                jsr        [PC - 0x9C /* 00000000 */]
  58. 0000009E  588F                     addq.l     A7, 4
  59. 000000A0  3007                     move.w     D0, D7
  60. 000000A2  5240                     addq.w     D0, 1
  61. 000000A4  3D40 0008                move.w     [A6 + 0x8], D0
  62. 000000A8  6000 0016                bra        +0x18 /* 000000C0 */
  63. label000000AC:
  64. 000000AC  3F2E 000A                move.w     -[A7], [A6 + 0xA]
  65. 000000B0  3007                     move.w     D0, D7
  66. 000000B2  5240                     addq.w     D0, 1
  67. 000000B4  3F00                     move.w     -[A7], D0
  68. 000000B6  4EBA FF48                jsr        [PC - 0xB8 /* 00000000 */]
  69. 000000BA  588F                     addq.l     A7, 4
  70. 000000BC  3D47 000A                move.w     [A6 + 0xA], D7
  71. label000000C0:
  72. 000000C0  302E 000A                move.w     D0, [A6 + 0xA]
  73. 000000C4  906E 0008                sub.w      D0, [A6 + 0x8]
  74. 000000C8  0C40 0001                cmpi.w     D0, 0x1
  75. 000000CC  6E00 FF3C                bgt        -0xC2 /* 0000000A */
  76. 000000D0  2E1F                     move.l     D7, [A7]+
  77. 000000D2  4E5E                     unlink     A6
  78. 000000D4  4E75                     rts
  79. fn000000D6:
  80. 000000D6  4E56 0000                link       A6, 0
  81. 000000DA  2B6E 000A FFD6           move.l     [A5 - 0x2A], [A6 + 0xA]
  82. 000000E0  2B6E 000E FFDA           move.l     [A5 - 0x26], [A6 + 0xE]
  83. 000000E6  3F2E 0008                move.w     -[A7], [A6 + 0x8]
  84. 000000EA  4267                     clr.w      -[A7]
  85. 000000EC  4EBA FF12                jsr        [PC - 0xEE /* 00000000 */]
  86. 000000F0  588F                     addq.l     A7, 4
  87. 000000F2  4E5E                     unlink     A6
  88. 000000F4  4E75                     rts
  89. export_44:
  90. 000000F6  4E56 FFFC                link       A6, -0x0004
  91. 000000FA  306E 0008                movea.w    A0, [A6 + 0x8]
  92. 000000FE  2F2D FFEC                move.l     -[A7], [A5 - 0x14]
  93. 00000102  2F08                     move.l     -[A7], A0
  94. 00000104  4EAD 0042                jsr        [A5 + 0x42 /* export_4 */]
  95. 00000108  D0AD FFE4                add.l      D0, [A5 - 0x1C]
  96. 0000010C  306E 000A                movea.w    A0, [A6 + 0xA]
  97. 00000110  2F2D FFEC                move.l     -[A7], [A5 - 0x14]
  98. 00000114  2F08                     move.l     -[A7], A0
  99. 00000116  2D40 FFFC                move.l     [A6 - 0x4], D0
  100. 0000011A  4EAD 0042                jsr        [A5 + 0x42 /* export_4 */]
  101. 0000011E  D0AD FFE4                add.l      D0, [A5 - 0x1C]
  102. 00000122  2F00                     move.l     -[A7], D0
  103. 00000124  206E FFFC                movea.l    A0, [A6 - 0x4]
  104. 00000128  4850                     pea.l      [A0]
  105. 0000012A  206D FFE0                movea.l    A0, [A5 - 0x20]
  106. 0000012E  4E90                     jsr        [A0]
  107. 00000130  508F                     addq.l     A7, 8
  108. 00000132  4E5E                     unlink     A6
  109. 00000134  4E75                     rts
  110. export_46:
  111. 00000136  4E56 0000                link       A6, 0
  112. 0000013A  48E7 0300                movem.l    -[A7], D6,D7
  113. 0000013E  3E2E 0008                move.w     D7, [A6 + 0x8]
  114. 00000142  3C2E 000A                move.w     D6, [A6 + 0xA]
  115. 00000146  202D FFEC                move.l     D0, [A5 - 0x14]
  116. 0000014A  4EAD 0032                jsr        [A5 + 0x32 /* export_2 */]
  117. 0000014E  0003 0014                ori.b      D3, 0x14
  118. 00000152  0000 0001                ori.b      D0, 0x1
  119. 00000156  0034 0000 0002           ori.b      [A4 + D0.w + 0x2], 0x0
  120. 0000015C  006C 0000 0004           ori.w      [A4 + 0x4], 0x0
  121. 00000162  00A4 3047 D1ED           ori.l      -[A4], 0x3047D1ED
  122. 00000168  FFE4                     .invalid   <<F/7/7>>
  123. 0000016A  1B50 FFF0                move.b     [A5 - 0x10], [A0]
  124. 0000016E  3047                     movea.w    A0, D7
  125. 00000170  D1ED FFE4                add.l      A0, [A5 - 0x1C]
  126. 00000174  3246                     movea.w    A1, D6
  127. 00000176  D3ED FFE4                add.l      A1, [A5 - 0x1C]
  128. 0000017A  1091                     move.b     [A0], [A1]
  129. 0000017C  3046                     movea.w    A0, D6
  130. 0000017E  D1ED FFE4                add.l      A0, [A5 - 0x1C]
  131. 00000182  10AD FFF0                move.b     [A0], [A5 - 0x10]
  132. 00000186  6000 00D6                bra        +0xD8 /* 0000025E */
  133. 0000018A  3007                     move.w     D0, D7
  134. 0000018C  48C0                     ext.l      D0
  135. 0000018E  D080                     add.l      D0, D0
  136. 00000190  D0AD FFE4                add.l      D0, [A5 - 0x1C]
  137. 00000194  2040                     movea.l    A0, D0
  138. 00000196  3B50 FFF2                move.w     [A5 - 0xE], [A0]
  139. 0000019A  3007                     move.w     D0, D7
  140. 0000019C  48C0                     ext.l      D0
  141. 0000019E  D080                     add.l      D0, D0
  142. 000001A0  D0AD FFE4                add.l      D0, [A5 - 0x1C]
  143. 000001A4  3206                     move.w     D1, D6
  144. 000001A6  48C1                     ext.l      D1
  145. 000001A8  D281                     add.l      D1, D1
  146. 000001AA  D2AD FFE4                add.l      D1, [A5 - 0x1C]
  147. 000001AE  2041                     movea.l    A0, D1
  148. 000001B0  2240                     movea.l    A1, D0
  149. 000001B2  3290                     move.w     [A1], [A0]
  150. 000001B4  3006                     move.w     D0, D6
  151. 000001B6  48C0                     ext.l      D0
  152. 000001B8  D080                     add.l      D0, D0
  153. 000001BA  D0AD FFE4                add.l      D0, [A5 - 0x1C]
  154. 000001BE  2040                     movea.l    A0, D0
  155. 000001C0  30AD FFF2                move.w     [A0], [A5 - 0xE]
  156. 000001C4  6000 0098                bra        +0x9A /* 0000025E */
  157. 000001C8  3007                     move.w     D0, D7
  158. 000001CA  48C0                     ext.l      D0
  159. 000001CC  E580                     asl        D0, 2
  160. 000001CE  D0AD FFE4                add.l      D0, [A5 - 0x1C]
  161. 000001D2  2040                     movea.l    A0, D0
  162. 000001D4  2B50 FFF4                move.l     [A5 - 0xC], [A0]
  163. 000001D8  3007                     move.w     D0, D7
  164. 000001DA  48C0                     ext.l      D0
  165. 000001DC  E580                     asl        D0, 2
  166. 000001DE  D0AD FFE4                add.l      D0, [A5 - 0x1C]
  167. 000001E2  3206                     move.w     D1, D6
  168. 000001E4  48C1                     ext.l      D1
  169. 000001E6  E581                     asl        D1, 2
  170. 000001E8  D2AD FFE4                add.l      D1, [A5 - 0x1C]
  171. 000001EC  2041                     movea.l    A0, D1
  172. 000001EE  2240                     movea.l    A1, D0
  173. 000001F0  2290                     move.l     [A1], [A0]
  174. 000001F2  3006                     move.w     D0, D6
  175. 000001F4  48C0                     ext.l      D0
  176. 000001F6  E580                     asl        D0, 2
  177. 000001F8  D0AD FFE4                add.l      D0, [A5 - 0x1C]
  178. 000001FC  2040                     movea.l    A0, D0
  179. 000001FE  20AD FFF4                move.l     [A0], [A5 - 0xC]
  180. 00000202  6000 005A                bra        +0x5C /* 0000025E */
  181. 00000206  3047                     movea.w    A0, D7
  182. 00000208  2F2D FFEC                move.l     -[A7], [A5 - 0x14]
  183. 0000020C  2F08                     move.l     -[A7], A0
  184. 0000020E  4EAD 0042                jsr        [A5 + 0x42 /* export_4 */]
  185. 00000212  D0AD FFE4                add.l      D0, [A5 - 0x1C]
  186. 00000216  2B40 FFF8                move.l     [A5 - 0x8], D0
  187. 0000021A  3046                     movea.w    A0, D6
  188. 0000021C  2F2D FFEC                move.l     -[A7], [A5 - 0x14]
  189. 00000220  2F08                     move.l     -[A7], A0
  190. 00000222  4EAD 0042                jsr        [A5 + 0x42 /* export_4 */]
  191. 00000226  D0AD FFE4                add.l      D0, [A5 - 0x1C]
  192. 0000022A  2B40 FFFC                move.l     [A5 - 0x4], D0
  193. 0000022E  2F2D FFF8                move.l     -[A7], [A5 - 0x8]
  194. 00000232  2F2D FFE8                move.l     -[A7], [A5 - 0x18]
  195. 00000236  2F2D FFEC                move.l     -[A7], [A5 - 0x14]
  196. 0000023A  4EAD 0152                jsr        [A5 + 0x152 /* export_38 */]
  197. 0000023E  2F2D FFFC                move.l     -[A7], [A5 - 0x4]
  198. 00000242  2F2D FFF8                move.l     -[A7], [A5 - 0x8]
  199. 00000246  2F2D FFEC                move.l     -[A7], [A5 - 0x14]
  200. 0000024A  4EAD 0152                jsr        [A5 + 0x152 /* export_38 */]
  201. 0000024E  2F2D FFE8                move.l     -[A7], [A5 - 0x18]
  202. 00000252  2F2D FFFC                move.l     -[A7], [A5 - 0x4]
  203. 00000256  2F2D FFEC                move.l     -[A7], [A5 - 0x14]
  204. 0000025A  4EAD 0152                jsr        [A5 + 0x152 /* export_38 */]
  205. label0000025E:
  206. 0000025E  4CDF 00C0                movem.l    D6,D7, [A7]+
  207. 00000262  4E5E                     unlink     A6
  208. 00000264  4E75                     rts
  209. export_45:
  210. 00000266  4E56 0000                link       A6, 0
  211. 0000026A  4A6E 000E                tst.w      [A6 + 0xE]
  212. 0000026E  6E00 0008                bgt        +0xA /* 00000278 */
  213. 00000272  70FF                     moveq.l    D0, 0xFFFFFFFF
  214. 00000274  6000 0074                bra        +0x76 /* 000002EA */
  215. label00000278:
  216. 00000278  42AD FFE8                clr.l      [A5 - 0x18]
  217. 0000027C  0C6E 0003 000E           cmpi.w     [A6 + 0xE], 0x3
  218. 00000282  6700 000C                beq        +0xE /* 00000290 */
  219. 00000286  0C6E 0004 000E           cmpi.w     [A6 + 0xE], 0x4
  220. 0000028C  6F00 0022                ble        +0x24 /* 000002B0 */
  221. label00000290:
  222. 00000290  598F                     subq.l     A7, 4
  223. 00000292  306E 000E                movea.w    A0, [A6 + 0xE]
  224. 00000296  2F08                     move.l     -[A7], A0
  225. 00000298  4EAD 015A                jsr        [A5 + 0x15A /* export_39 */]
  226. 0000029C  201F                     move.l     D0, [A7]+
  227. 0000029E  2B40 FFE8                move.l     [A5 - 0x18], D0
  228. 000002A2  4A78 0220                tst.w      [0x00000220 /* MemErr */]
  229. 000002A6  6700 0008                beq        +0xA /* 000002B0 */
  230. 000002AA  70FF                     moveq.l    D0, 0xFFFFFFFF
  231. 000002AC  6000 003C                bra        +0x3E /* 000002EA */
  232. label000002B0:
  233. 000002B0  2B6E 0010 FFE0           move.l     [A5 - 0x20], [A6 + 0x10]
  234. 000002B6  2B6E 0008 FFE4           move.l     [A5 - 0x1C], [A6 + 0x8]
  235. 000002BC  306E 000E                movea.w    A0, [A6 + 0xE]
  236. 000002C0  2B48 FFEC                move.l     [A5 - 0x14], A0
  237. 000002C4  486D 0192                pea.l      [A5 + 0x192 /* export_46 */]
  238. 000002C8  486D 0182                pea.l      [A5 + 0x182 /* export_44 */]
  239. 000002CC  3F2E 000C                move.w     -[A7], [A6 + 0xC]
  240. 000002D0  4EBA FE04                jsr        [PC - 0x1FC /* 000000D6 */]
  241. 000002D4  4FEF 000A                lea.l      A7, [A7 + 0xA]
  242. 000002D8  4AAD FFE8                tst.l      [A5 - 0x18]
  243. 000002DC  6700 000A                beq        +0xC /* 000002E8 */
  244. 000002E0  2F2D FFE8                move.l     -[A7], [A5 - 0x18]
  245. 000002E4  4EAD 0162                jsr        [A5 + 0x162 /* export_40 */]
  246. label000002E8:
  247. 000002E8  7000                     moveq.l    D0, 0x00
  248. label000002EA:
  249. 000002EA  4E5E                     unlink     A6
  250. 000002EC  4E75                     rts
  251. export_47:
  252. fn000002EE:
  253. 000002EE  4EAD 0092                jsr        [A5 + 0x92 /* export_14 */]
  254. 000002F2  A9F4                     syscall    ExitToShell
  255. 000002F4  4E75                     rts
  256. 000002F6  A9F4                     syscall    ExitToShell
  257. 000002F8  4E75                     rts
  258. 000002FA  4E56 FFFE                link       A6, -0x0002
  259. 000002FE  4879 0000 1122           push.l     0x1122
  260. 00000304  4EAD 00C2                jsr        [A5 + 0xC2 /* export_20 */]
  261. 00000308  588F                     addq.l     A7, 4
  262. label0000030A:
  263. 0000030A  4EAD 00BA                jsr        [A5 + 0xBA /* export_19 */]
  264. 0000030E  3F00                     move.w     -[A7], D0
  265. 00000310  4EAD 00B2                jsr        [A5 + 0xB2 /* export_18 */]
  266. 00000314  548F                     addq.l     A7, 2
  267. 00000316  1D40 FFFF                move.b     [A6 - 0x1], D0
  268. 0000031A  0C00 0044                cmpi.b     D0, 0x44 /* 'D' */
  269. 0000031E  6600 0004                bne        +0x6 /* 00000324 */
  270. 00000322  A9FF                     syscall    Debugger
  271. label00000324:
  272. 00000324  0C2E 0045 FFFF           cmpi.b     [A6 - 0x1], 0x45 /* 'E' */
  273. 0000032A  6600 FFDE                bne        -0x20 /* 0000030A */
  274. 0000032E  4EBA FFBE                jsr        [PC - 0x42 /* 000002EE */]
  275. 00000332  6000 FFD6                bra        -0x28 /* 0000030A */
  276. 00000336  4E5E                     unlink     A6
  277. 00000338  4E75                     rts
  278.